﻿Imports System.IO

Public Class SPECIALTHANKS

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim f As String

        If (CheckBox1.Checked) Then
            f = "C:\Program Files\Trigsoft\Trigbase"
            System.IO.Directory.CreateDirectory(f)
            File.Create("c:\Program Files\Trigsoft\Trigbase\Trigsoft_EXIT")

            Application.Exit()
        Else

            Application.Exit()
        End If
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Close()
    End Sub
End Class